home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / AZTECW.DIR / 01700_Script_Farming < prev    next >
Text File  |  1995-09-12  |  7KB  |  210 lines
  1. global gQuest, gBeenClicked, gHouseIsOpen
  2.  
  3. on AFarmRollovers
  4.   set gBeenClicked = 0
  5.   if (not(CheckClickedStatus(gQuest))) then
  6.     if rollover(7) then
  7.       repeat while rollover(7)
  8.         AztecCursor
  9.         puppetsprite 17, true
  10.         puppetsprite 16, true
  11.         set the locH of sprite 16 to 445
  12.         set the locV of sprite 16 to 291
  13.         set the locH of sprite 17 to 406
  14.         set the locV of sprite 17 to 381
  15.         updatestage
  16.         if the mousedown then
  17.           set GBeenClicked = 1
  18.         else
  19.           if gBeenClicked = 1 then
  20.             repeat while gBeenClicked = 1
  21.               AnimateLoopFast 7, 363, 3, 0, 3
  22.             end repeat
  23.           end if
  24.         end if
  25.       end repeat
  26.       set the locH of sprite 17 to 906
  27.       puppetsprite 17, false
  28.       updatestage
  29.     else
  30.       if rollover(8) then
  31.         repeat while rollover(8)
  32.           AztecCursor
  33.           puppetsprite 18, true
  34.           puppetsprite 16, true
  35.           set the locH of sprite 16 to 445
  36.           set the locV of sprite 16 to 291
  37.           set the locH of sprite 18 to 210
  38.           set the locV of sprite 18 to 381
  39.           updatestage
  40.           if the mousedown then
  41.             set GBeenClicked = 1
  42.           else
  43.             if gBeenClicked = 1 then
  44.               repeat while gBeenClicked = 1
  45.                 AnimateLoopFast 8, 366, 3, 0, 3
  46.               end repeat
  47.             end if
  48.           end if
  49.         end repeat
  50.         set the locH of sprite 18 to 910
  51.         puppetsprite 18, false
  52.         updatestage
  53.       else
  54.         if rollover(10) then
  55.           repeat while rollover(10)
  56.             AztecCursor
  57.             puppetsprite 19, true
  58.             puppetsprite 16, true
  59.             set the locH of sprite 16 to 445
  60.             set the locV of sprite 16 to 291
  61.             set the locH of sprite 19 to 427
  62.             set the locV of sprite 19 to 389
  63.             updatestage
  64.             if the mousedown then
  65.               set GBeenClicked = 1
  66.             else
  67.               if gBeenClicked = 1 then
  68.                 repeat while gBeenClicked = 1
  69.                   AnimateLoopFast 10, 369, 3, 0, 3
  70.                 end repeat
  71.               end if
  72.             end if
  73.           end repeat
  74.           set the locH of sprite 19 to 927
  75.           puppetsprite 19, false
  76.           updatestage
  77.         else
  78.           if rollover(9) then
  79.             repeat while rollover(9)
  80.               AztecCursor
  81.               puppetsprite 20, true
  82.               puppetsprite 16, true
  83.               set the locH of sprite 16 to 445
  84.               set the locV of sprite 16 to 291
  85.               set the locH of sprite 20 to 370
  86.               set the locV of sprite 20 to 386
  87.               updatestage
  88.               if the mousedown then
  89.                 set GBeenClicked = 1
  90.               else
  91.                 if gBeenClicked = 1 then
  92.                   repeat while gBeenClicked = 1
  93.                     AnimateLoopToFro 9, 372, 2, 0, 3
  94.                   end repeat
  95.                 end if
  96.               end if
  97.             end repeat
  98.             set the locH of sprite 20 to 970
  99.             puppetsprite 20, false
  100.             updatestage
  101.           else
  102.             if rollover(28) then
  103.               ArrowCursor
  104.               repeat while rollover(28)
  105.                 puppetsprite 43, true
  106.                 puppetsprite 16, true
  107.                 set the locH of sprite 16 to 445
  108.                 set the locV of sprite 16 to 291
  109.                 set the locH of sprite 43 to 502
  110.                 set the locV of sprite 43 to 373
  111.                 updatestage
  112.               end repeat
  113.               set the locH of sprite 43 to 902
  114.               puppetsprite 43, false
  115.               updatestage
  116.             else
  117.               if rollover(21) then
  118.                 ArrowCursor
  119.                 set the locH of sprite 16 to 800
  120.                 puppetsprite 16, false
  121.                 updatestage
  122.                 repeat while rollover(21)
  123.                   set the locH of sprite 11 to 421
  124.                   set the locV of sprite 11 to 225
  125.                   updatestage
  126.                 end repeat
  127.                 set the locH of sprite 11 to 921
  128.                 updatestage
  129.               else
  130.                 if rollover(12) then
  131.                   ArrowCursor
  132.                   set the locH of sprite 16 to 800
  133.                   puppetsprite 16, false
  134.                   updatestage
  135.                   repeat while rollover(12)
  136.                     set the locH of sprite 13 to 365
  137.                     set the locV of sprite 13 to 353
  138.                     updatestage
  139.                   end repeat
  140.                   set the locH of sprite 13 to 965
  141.                   updatestage
  142.                 else
  143.                   if rollover(14) then
  144.                     ArrowCursor
  145.                     set the locH of sprite 16 to 800
  146.                     puppetsprite 16, false
  147.                     updatestage
  148.                     repeat while rollover(14)
  149.                       set the locH of sprite 15 to 420
  150.                       set the locV of sprite 15 to 225
  151.                       updatestage
  152.                     end repeat
  153.                   else
  154.                     if the mousecast = the castnum of sprite 6 then
  155.                       ArrowCursor
  156.                       set the locH of sprite 16 to 800
  157.                       puppetsprite 16, false
  158.                       updatestage
  159.                       repeat while the mousecast = the castnum of sprite 6 or rollover(22)
  160.                         puppetsprite 22, true
  161.                         set the locH of sprite 22 to 378
  162.                         set the locV of sprite 22 to 212
  163.                         updatestage
  164.                       end repeat
  165.                       puppetsprite 22, false
  166.                     else
  167.                       if rollover(39) then
  168.                         ArrowCursor
  169.                         set the locH of sprite 16 to 800
  170.                         puppetsprite 16, false
  171.                         updatestage
  172.                         repeat while rollover(39)
  173.                           set the locH of sprite 40 to 479
  174.                           set the locV of sprite 40 to 272
  175.                           updatestage
  176.                         end repeat
  177.                       else
  178.                         if rollover(40) then
  179.                           HandCursor
  180.                         else
  181.                           if rollover(41) then
  182.                             HandCursor
  183.                           else
  184.                             if rollover(42) then
  185.                               HandCursor
  186.                             else
  187.                               ArrowCursor
  188.                             end if
  189.                           end if
  190.                         end if
  191.                       end if
  192.                     end if
  193.                   end if
  194.                 end if
  195.               end if
  196.             end if
  197.           end if
  198.         end if
  199.       end if
  200.     end if
  201.   end if
  202.   RandomQuestion(gQuest)
  203. end
  204.  
  205. on ResetFarming
  206.   set the locH of sprite 16 to 800
  207.   puppetsprite 16, false
  208.   updatestage
  209. end
  210.